home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 5 / Skunkware 5.iso / src / Tools / xc-4.4 / .slip.eg < prev    next >
Text File  |  1995-05-03  |  1KB  |  33 lines

  1. # @(#) .slip script for xc -- JPRadley 931010
  2. # @(#) based on original work of Francois Vrona
  3.     assign logname eq $LOGNAME
  4.     if logname neq "root"
  5.     then
  6.         echo "Must be run as root"
  7.         beep
  8.         quit
  9.     fi
  10.     set cis off
  11.     # debug "on"        # turn on verbose script reporting
  12.     # tty "off"            # don't echo received characters to screen
  13.     # transmit "atS41=5^M"    # 30 minute WB inactivity timeout
  14.     dial "456-7890"
  15.     while ! waitfor "CONNECT" 40; do; redial; done
  16.     waitfor  "name:";    transmit "ItIsI^M"
  17.     waitfor  "word:";    transmit "SecRet^M"
  18.     waitfor  ">";        transmit "terminal download^M"
  19.     waitfor  ">";        transmit "terminal telnet-transparent^M"
  20.     waitfor  ">";        transmit "slip /compress^M"
  21.     waitfor  ":";        transmit "ItIsI^M"
  22.     waitfor  ":";        transmit "SecRet^M"
  23.     waitfor  "compress."
  24.     # add route *after* slattach with sleep!!!!
  25.     shell "(sleep 5;route add default 222.33.444.5 1) &"
  26.     shell "(stty intr '' quit '' kill '';slattach +e +v +m 1500 $MODEM 111.22.333.44 222.33.444.5 38400)"
  27.     # if we get here, the slattach got killed & we are done...
  28.     shell "route delete default 222.33.444.5"
  29.     echo "SLIP CONNECTION TERMINATED!!!!"
  30.     hangup
  31.     beep
  32.     quit
  33.